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APPENDIX J 


ISIS HOST SOFTWARE 


ISHOST.SRC may be linked with the I/0 modules HOST2.SRC, or 
HOST3.SRC. The program is derived from Childress' host program 
CPMTMP.SRC (15). The software operatates on the Intel 230 or 


Intel 210 under the ISIS operation system. 
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SBC 544 Simulation Software 
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SIM544.SRC contains the format modifications to the SBC 544 
Simulation software used to validate the frame and packet header formats 


made on the embedded SBC 544 software. 
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APPENDIX M 


SBC 544 Operational Software 


OP544.SRC contains the software modified for polled transmit 1/0. 


This software was successfully tested in the LSI-ll network. This 


+: 


software is embedded on the SBC 544. The UNID is assigned UNID number y 


2, Country Code 9 for operation in the LSI-11 network. Refer to the 


a 


EE690 gateway software for information on the LSI-11 gateway nodes and can 
to chapter VI for testing within the LSI-11 network. ke. 
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INCLUDE SOURCE CODE FOR OP544.SRC_ (INTR3.LOC) PAGE 11 


END SERVICESTRANS$2; 
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* OATE: 25 SEP 85 * 
* VERSION: 1.2 * 
* NAME: SERVICESTRANS$3 * 
* MODULE NUMBER: 8.6 * 
* DESCRIPTION: This procedure is a polled transmit * 
* service routine that is called in an endless loop * 
.* through procedure ROUTE$OUT. The procedure transmits * 
* a DATAGRAM$SIZE segment of data in the local trasnmit * 
* table. The receive interrupts stay active during the * 
* operation of this prodecure. * 
* PASSED VARIABLES: None * 
* RETURNS: None * 
* GLOBAL VARIBLES USED: LCO3NE, BYTESSSENT$3, TXTR$3, TXTAS$3, * 
* SEMD$3 RXTA$3, RXTR$3 * 
* GLOBAL VARIBLES CHANGED: All of those above * 
* MODULES CALLED: SNDSEQ, * 
* CALLING MODULES: ROUTESOUT 3 * 
* AUTHOR: Mark Weber : * 
* HISTORY: 1.2 Mark Weber - 25 SEP 85 - polled transmit routines * 
* 1.1 C.T. Childress - 2 OCT 84 ~ original SBC 544 * 
* implementation. = 
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SERVICES$TRANS$3: PROCEDURE ; 


00; 
DO WHILE BYTES$SENT$3 < DATA$GRAM$SIZE; 
DO WHILE NOT (INPUT(USS$P2$STAT) AND 1); END; 
OUTPUT(US$P2$DATA) = LCO3TX(TXO3NS); 
BYTESSSENT$3 = BYTESS$SENT$3 + 1; 
TXO3NS = TXO3NS + 1; 
END; 
1F BYTES$SENT$3 >= DATA$GRAM$SIZE THEN 
DO; 
BYTESS$SENT$3 = 0; 
IF TXO3NS >= TXO3SZ THEN 
TXO3NS = 0; 
TXTR$Q = FALSE; 
RXTA$3 = FALSE; 
SEND$3 = FALSE; 
CALL SNDSEQ(.TP$4A, SIZE(TP$4A)); 
END; 
END; 


END SERVICES$TRANSS$3; 
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NETX25.SRC - Main program module... 


LAPBO.SRC - 


LAPBI.SRC - 


APPENDIX N 


DATA LINK SIMULATION SOFTWARE 


Module with LAP B procedures. .. 


Module with LAP B procedures... 


PCKT.SRC - Module with Packet Layer procedures 
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